<?php

/**
 * 
 * @author smallchicken 内裤叔叔 修改
 * @name   图片处理类
 * @param  2013.04.21
 * @param 
 * 			说明：
 * 			mode 1 : 强制裁剪，生成图片严格按照需要，不足放大，超过裁剪，图片始终铺满
 * 			mode 2 : 和1类似，但不足的时候 不放大 会产生补白，可以用png消除。
 * 			mode 3 : 只缩放，不裁剪，保留全部图片信息，会产生补白，
 * 			mode 4 : 只缩放，不裁剪，保留全部图片信息，生成图片大小为最终缩放后的图片有效信息的实际大小，不产生补白
 * 			默认补白为白色，如果要使补白成透明像素，请使用SaveAlpha()方法代替SaveImage()方法
 * @example
 * 		1:单一用法
 * 			$ic=new ImageCrop('old.jpg','afterCrop.jpg');
 * 			$ic->Crop(120,80,2);
 * 			$ic->SaveImage();
 * 			$ic->destory();
 * 		  或：
 * 			$ic=new ImageCrop();
 * 			$ic->setConfi('old.jpg','afterCrop.jpg');
 * 			$ic->Crop(120,80,2);
 * 			$ic->SaveImage();
 * 			$ic->destory();
 * 		2:批量处理
 * 			$data = array(
					array("./data/push/20110830/1314671703.jpg","./data/1314671703.small.jpg",100,120,1),
					array("./data/push/20110830/13146717025.jpg","./data/13146717025.small.jpg",100,120,1),
					array("./data/push/20110830/13146717026.jpg","./data/13146717026.small.jpg",100,120,1),
			);
			$im = new ImageCrop();
			$im->setCropArray($data);
 *
 *
 */
class cutimageInit {
	/**
	 * 原图资源
	 * @var resource
	 */
	public $sImage;
	
	/**
	 * 目标图资源
	 * @var resource
	 */
	public $dImage;
	/**
	 * 原图路径
	 * @var string
	 */
	public $src_file;
	/**
	 * 目标图路径
	 * @var string
	 */
	public $dst_file;
	/**
	 * 原图宽度
	 * @var int
	 */
	public $src_width;
	/**
	 * 目标图高度
	 * @var int
	 */
	public $src_height;
	/**
	 * 原图后缀名
	 * @var string
	 */
	public $src_ext;
	/**
	 * 原图图片类型
	 * @var string
	 */
	public $src_type;
	
	/**
	 * 初始化图片类
	 * @param string $src_file
	 *        	源图
	 * @param string $dst_file
	 *        	操作后的图
	 */
	public function __construct($src_file = "", $dst_file = '') {
		if ($src_file && $dst_file) {
			$this->src_file = $src_file;
			$this->dst_file = $dst_file;
			$this->LoadImage ();
		}
	}
	
	/**
	 * 单一设置图片操作
	 * 当__construct参数均为空时此函数值有效
	 * @param string $src_file
	 *        	源图
	 * @param string $dst_file
	 *        	操作后的图
	 */
	public function setConfi($src_file, $dst_file = "") {
		$this->src_file = $src_file;
		$this->dst_file = $dst_file;
		$this->LoadImage ();
	}

	public function setCropArray($data, $output = 0) {
		if (! is_array ( $data ) || empty ( $data ))
			return false;
		foreach ( $data as $key => $value ) {
			$this->src_file = $value [0];
			$this->dst_file = $value [1];
			$this->LoadImage ();
			$this->Crop ( $value [2], $value [3], $value [4] );
			if ($output == 1) {
				$this->OutImage ();
			} else {
				$this->SaveImage ();
			}
			$this->destory ();
		}
		return true;
	}
	
	/**
	 * 加载图片资源
	 */
	private function LoadImage() {
		list ( $this->src_width, $this->src_height, $this->src_type ) = getimagesize ( $this->src_file );
		switch ($this->src_type) {
			case IMAGETYPE_JPEG :
				$this->sImage = imagecreatefromjpeg ( $this->src_file );
				$this->ext = 'jpg';
				break;
			case IMAGETYPE_PNG :
				$this->sImage = imagecreatefrompng ( $this->src_file );
				$this->ext = 'png';
				break;
			case IMAGETYPE_GIF :
				$this->sImage = imagecreatefromgif ( $this->src_file );
				$this->ext = 'gif';
				break;
			default :
				exit ();
		}
	}
	
	/**
	 * 保存图片
	 * 
	 * @param string $fileName
	 * 保存的图，可为空 若为空则使用 $this->dst_file;
	 */
	public function SaveImage($fileName = '') {
		$this->dst_file = $fileName ? $fileName : $this->dst_file;
		switch ($this->src_type) {
			case IMAGETYPE_JPEG :
				imagejpeg ( $this->dImage, $this->dst_file, 100);
				break;
			case IMAGETYPE_PNG :
				imagepng ( $this->dImage, $this->dst_file);
				break;
			case IMAGETYPE_GIF :
				imagegif ( $this->dImage, $this->dst_file);
				break;
			default :
				break;
		}
	}
	
	/**
	 * 输出图片 但不保存
	 */
	public function OutImage() {
		switch ($this->src_type) {
			case IMAGETYPE_JPEG :
				header ( 'Content-type: image/jpeg' );
				imagejpeg ( $this->dImage );
				break;
			case IMAGETYPE_PNG :
				header ( 'Content-type: image/png' );
				imagepng ( $this->dImage );
				break;
			case IMAGETYPE_GIF :
				header ( 'Content-type: image/gif' );
				imagegif ( $this->dImage );
				break;
			default :
				break;
		}
	}
	
	/**
	 * 保存png透明图片 图片不够，则用白色填补，需使用次方法
	 * 
	 * @param string $fileName
	 *        	保存图
	 */
	public function SaveAlpha($fileName = '') {
		$this->dst_file = $fileName ? $fileName . '.png' : $this->dst_file . '.png';
		imagesavealpha ( $this->dImage, true );
		imagepng ( $this->dImage, $this->dst_file );
	}
	
	/**
	 * 输出png透明图 不保存
	 */
	public function OutAlpha() {
		imagesavealpha ( $this->dImage, true );
		header ( 'Content-type: image/png' );
		imagepng ( $this->dImage );
	}
	
	/**
	 * 销毁对象
	 */
	public function destory() {
		imagedestroy ( $this->sImage );
		imagedestroy ( $this->dImage );
	}
	
	/**
	 * 图片裁剪/压缩
	 * 
	 * @param int $dst_width
	 *        	目标图片宽度
	 * @param int $dst_height
	 *        	目标图片高度
	 * @param number $mode
	 *        	裁剪模式
	 * @param
	 *        	说明：
	 *        	mode 1 : 强制裁剪，生成图片严格按照需要，不足放大，超过裁剪，图片始终铺满
	 *        	mode 2 : 和1类似，但不足的时候 不放大 会产生补白，可以用png消除。
	 *        	mode 3 : 只缩放，不裁剪，保留全部图片信息，会产生补白，
	 *        	mode 4 : 只缩放，不裁剪，保留全部图片信息，生成图片大小为最终缩放后的图片有效信息的实际大小，不产生补白
	 * @param string $dst_file
	 *        	目标文件 可谓空
	 */
	public function Crop($dst_width, $dst_height, $mode = 1, $dst_file = '') {
		if ($dst_file)
			$this->dst_file = $dst_file;
		$this->dImage = imagecreatetruecolor ( $dst_width, $dst_height );
		
		$bg = imagecolorallocatealpha ( $this->dImage, 255, 255, 255, 127 );
		imagefill ( $this->dImage, 0, 0, $bg );
		imagecolortransparent ( $this->dImage, $bg );
		
		$ratio_w = 1.0 * $dst_width / $this->src_width;
		$ratio_h = 1.0 * $dst_height / $this->src_height;
		$ratio = 1.0;
		switch ($mode) {
			case 1 : // 强制裁剪，生成图片严格按照需要，不足放大，超过裁剪，图片始终铺满
				if (($ratio_w < 1 && $ratio_h < 1) || ($ratio_w > 1 && $ratio_h > 1)) {
					$ratio = $ratio_w < $ratio_h ? $ratio_h : $ratio_w;
					$tmp_w = ( int ) ($dst_width / $ratio);
					$tmp_h = ( int ) ($dst_height / $ratio);
					$tmp_img = imagecreatetruecolor ( $tmp_w, $tmp_h );
					$src_x = ( int ) (($this->src_width - $tmp_w) / 2);
					$src_y = ( int ) (($this->src_height - $tmp_h) / 2);
					imagecopy ( $tmp_img, $this->sImage, 0, 0, $src_x, $src_y, $tmp_w, $tmp_h );
					imagecopyresampled ( $this->dImage, $tmp_img, 0, 0, 0, 0, $dst_width, $dst_height, $tmp_w, $tmp_h );
					imagedestroy ( $tmp_img );
				} else {
					$ratio = $ratio_w < $ratio_h ? $ratio_h : $ratio_w;
					$tmp_w = ( int ) ($this->src_width * $ratio);
					$tmp_h = ( int ) ($this->src_height * $ratio);
					$tmp_img = imagecreatetruecolor ( $tmp_w, $tmp_h );
					imagecopyresampled ( $tmp_img, $this->sImage, 0, 0, 0, 0, $tmp_w, $tmp_h, $this->src_width, $this->src_height );
					$src_x = ( int ) ($tmp_w - $dst_width) / 2;
					$src_y = ( int ) ($tmp_h - $dst_height) / 2;
					imagecopy ( $this->dImage, $tmp_img, 0, 0, $src_x, $src_y, $dst_width, $dst_height );
					imagedestroy ( $tmp_img );
				}
				break;
			case 2 : // 和1类似，但不足的时候 不放大 会产生补白，可以用png消除。
				if ($ratio_w < 1 && $ratio_h < 1) {
					$ratio = $ratio_w < $ratio_h ? $ratio_h : $ratio_w;
					$tmp_w = ( int ) ($dst_width / $ratio);
					$tmp_h = ( int ) ($dst_height / $ratio);
					$tmp_img = imagecreatetruecolor ( $tmp_w, $tmp_h );
					$src_x = ( int ) ($this->src_width - $tmp_w) / 2;
					$src_y = ( int ) ($this->src_height - $tmp_h) / 2;
					imagecopy ( $tmp_img, $this->sImage, 0, 0, $src_x, $src_y, $tmp_w, $tmp_h );
					imagecopyresampled ( $this->dImage, $tmp_img, 0, 0, 0, 0, $dst_width, $dst_height, $tmp_w, $tmp_h );
					imagedestroy ( $tmp_img );
				} elseif ($ratio_w > 1 && $ratio_h > 1) {
					$dst_x = ( int ) abs ( $dst_width - $this->src_width ) / 2;
					$dst_y = ( int ) abs ( $dst_height - $this->src_height ) / 2;
					imagecopy ( $this->dImage, $this->sImage, $dst_x, $dst_y, 0, 0, $this->src_width, $this->src_height );
				} else {
					$src_x = 0;
					$dst_x = 0;
					$src_y = 0;
					$dst_y = 0;
					if (($dst_width - $this->src_width) < 0) {
						$src_x = ( int ) ($this->src_width - $dst_width) / 2;
						$dst_x = 0;
					} else {
						$src_x = 0;
						$dst_x = ( int ) ($dst_width - $this->src_width) / 2;
					}
					
					if (($dst_height - $this->src_height) < 0) {
						$src_y = ( int ) ($this->src_height - $dst_height) / 2;
						$dst_y = 0;
					} else {
						$src_y = 0;
						$dst_y = ( int ) ($dst_height - $this->src_height) / 2;
					}
					imagecopy ( $this->dImage, $this->sImage, $dst_x, $dst_y, $src_x, $src_y, $this->src_width, $this->src_height );
				}
				break;
			case 3 : // 只缩放，不裁剪，保留全部图片信息，会产生补白，
				if ($ratio_w > 1 && $ratio_h > 1) {
					$dst_x = ( int ) (abs ( $dst_width - $this->src_width ) / 2);
					$dst_y = ( int ) (abs ( $dst_height - $this->src_height ) / 2);
					imagecopy ( $this->dImage, $this->sImage, $dst_x, $dst_y, 0, 0, $this->src_width, $this->src_height );
				} else {
					$ratio = $ratio_w > $ratio_h ? $ratio_h : $ratio_w;
					$tmp_w = ( int ) ($this->src_width * $ratio);
					$tmp_h = ( int ) ($this->src_height * $ratio);
					$tmp_img = imagecreatetruecolor ( $tmp_w, $tmp_h );
					imagecopyresampled ( $tmp_img, $this->sImage, 0, 0, 0, 0, $tmp_w, $tmp_h, $this->src_width, $this->src_height );
					$dst_x = ( int ) (abs ( $tmp_w - $dst_width ) / 2);
					$dst_y = ( int ) (abs ( $tmp_h - $dst_height ) / 2);
					imagecopy ( $this->dImage, $tmp_img, $dst_x, $dst_y, 0, 0, $tmp_w, $tmp_h );
					imagedestroy ( $tmp_img );
				}
				break;
			case 4 : // 只缩放，不裁剪，保留全部图片信息，生成图片大小为最终缩放后的图片有效信息的实际大小，不产生补白
				if ($ratio_w > 1 && $ratio_h > 1) {
					$this->dImage = imagecreatetruecolor ( $this->src_width, $this->src_height );
					imagecopy ( $this->dImage, $this->sImage, 0, 0, 0, 0, $this->src_width, $this->src_height );
				} else {
					$ratio = $ratio_w > $ratio_h ? $ratio_h : $ratio_w;
					$tmp_w = ( int ) ($this->src_width * $ratio);
					$tmp_h = ( int ) ($this->src_height * $ratio);
					$this->dImage = imagecreatetruecolor ( $tmp_w, $tmp_h );
					imagecopyresampled ( $this->dImage, $this->sImage, 0, 0, 0, 0, $tmp_w, $tmp_h, $this->src_width, $this->src_height );
				}
				break;
		}
	}
}